home *** CD-ROM | disk | FTP | other *** search
/ Champak 114 / Vol 114.iso / games / y2k_tetr.swf / scripts / DefineSprite_204 / frame_12 / DoAction.as
Encoding:
Text File  |  2010-08-12  |  2.3 KB  |  43 lines
  1. duplicateMovieClip("kub" add nfig,"k" add tekn,tekn + 16384);
  2. setProperty("k" add tekn, _X, getProperty("figure", _X) + getProperty("figure/k1", _X));
  3. setProperty("k" add tekn, _Y, getProperty("figure", _Y) + getProperty("figure/k1", _Y));
  4. setProperty("k" add tekn, _rotation, ugol_tk);
  5. tposx = (getProperty("figure", _X) + getProperty("figure/k1", _X) - "5") / "10" + "1";
  6. tposy = (getProperty("figure", _Y) + getProperty("figure/k1", _Y) - "5") / "10" + "1";
  7. set("dim" add tposx add "_" add tposy,"k" add tekn);
  8. c1 = tposy;
  9. tekn += "1";
  10. duplicateMovieClip("kub" add nfig,"k" add tekn,tekn + 16384);
  11. setProperty("k" add tekn, _X, getProperty("figure", _X) + getProperty("figure/k2", _X));
  12. setProperty("k" add tekn, _Y, getProperty("figure", _Y) + getProperty("figure/k2", _Y));
  13. setProperty("k" add tekn, _rotation, ugol_tk);
  14. tposx = (getProperty("figure", _X) + getProperty("figure/k2", _X) - "5") / "10" + "1";
  15. tposy = (getProperty("figure", _Y) + getProperty("figure/k2", _Y) - "5") / "10" + "1";
  16. set("dim" add tposx add "_" add tposy,"k" add tekn);
  17. c2 = tposy;
  18. tekn += "1";
  19. duplicateMovieClip("kub" add nfig,"k" add tekn,tekn + 16384);
  20. setProperty("k" add tekn, _X, getProperty("figure", _X) + getProperty("figure/k3", _X));
  21. setProperty("k" add tekn, _Y, getProperty("figure", _Y) + getProperty("figure/k3", _Y));
  22. setProperty("k" add tekn, _rotation, ugol_tk);
  23. tposx = (getProperty("figure", _X) + getProperty("figure/k3", _X) - "5") / "10" + "1";
  24. tposy = (getProperty("figure", _Y) + getProperty("figure/k3", _Y) - "5") / "10" + "1";
  25. set("dim" add tposx add "_" add tposy,"k" add tekn);
  26. c3 = tposy;
  27. tekn += "1";
  28. duplicateMovieClip("kub" add nfig,"k" add tekn,tekn + 16384);
  29. setProperty("k" add tekn, _X, getProperty("figure", _X) + getProperty("figure/k4", _X));
  30. setProperty("k" add tekn, _Y, getProperty("figure", _Y) + getProperty("figure/k4", _Y));
  31. setProperty("k" add tekn, _rotation, ugol_tk);
  32. tposx = (getProperty("figure", _X) + getProperty("figure/k4", _X) - "5") / "10" + "1";
  33. tposy = (getProperty("figure", _Y) + getProperty("figure/k4", _Y) - "5") / "10" + "1";
  34. set("dim" add tposx add "_" add tposy,"k" add tekn);
  35. c4 = tposy;
  36. tekn += "1";
  37. removeMovieClip("figure");
  38. removeMovieClip("figurev");
  39. if("1" >= c1 and "1" >= c2 and "1" >= c3 and "1" >= c4)
  40. {
  41.    gotoAndPlay(33);
  42. }
  43.